home *** CD-ROM | disk | FTP | other *** search
/ Wonky Flux Batch 2019 02 / Wonky_Flux_Batch_2019-02.zip / Wonky Flux Batch 2019-02 / 024 - Big U Macroworks.dsk / CLOCKS.bas < prev    next >
BASIC Source File  |  2019-02-16  |  1KB  |  14 lines
  1. 10  TEXT : PRINT  CHR$(21): HOME 
  2. 12  PRINT "This program is for Applied Engineering clock software used without an expander."
  3. 20  PRINT "It modifies MACRO.SYSTEM to work with   clock software only. If you get a memoryexpansion later, use the original       MACRO.SYSTEM.": PRINT 
  4. 30  PRINT "The '@' may be used in the data base,   and the time will be displayed on the   screen, but it will not be updated      until you change screens.": PRINT 
  5. 40  PRINT "Version 3.0.1 of CLOCKWORKS is required to work with MacroWorks. Make the<CTRL-M>CLOCKWORKS modifications before using<CTRL-M>this program.": PRINT 
  6. 50  PRINT "Press Esc to exit, or press Return to": PRINT "modify the disk in the current drive: ";
  7. 60  GET X$: IF X$ =  CHR$(27)  THEN  HOME : END 
  8. 70  IF X$ < > CHR$(13)  THEN  GOTO 60
  9. 80  PRINT  CHR$(4)"BLOAD MACRO.SYSTEM,TSYS,A$2000":VER =  PEEK(8199)
  10. 90 AD = 8646
  11. 95  POKE 8620,255: POKE 8930,32
  12. 100  POKE AD,14: POKE AD +1,76: POKE AD +2,205: POKE AD +3,16
  13. 120  PRINT  CHR$(4)"BSAVE MACRO.SYSTEM,TSYS,A$2000"
  14. 130  HOME : PRINT : PRINT "MACRO.SYSTEM successfully modified."